insert into asm_GISEL

select 
concat (case when stato_contratto = 'A' then '99999999' else to_char(co.DATA_CHIUSURA_RICHIESTA,'yyyymmdd') end,
substr(concat('00000000',co.codice_contratto),-8,8)) seq,




' ' "Fase",
concat ('IT018E',concat(substr(concat ('000000000',fo.codice_allacciamento),-7,7),substr(concat('0000',fo.progressivo_utenza),-1,1))) "POD",
' ' "Gruppo_pod",
case when ut.codice_modello_contatore_1 like'M4%' then 'X' else 
case when ut.CODICE_MODELLO_CONTATORE_1 like 'M%' or ut.CODICE_MODELLO_CONTATORE_1 like 'T%' or ut.CODICE_MODELLO_CONTATORE_1 ='RT90' then  'N' else 'S' 
end end "EM",
ut.MATRICOLA_CONTATORE_1 "Matricola contatore",

--co.DATA_AVVIO "Data Inizio Contratto",
--to_char(co.DATA_CHIUSURA," Data Fine Contratto",
co.Data_avvio data_inizio_contratto, --AAAAMMGG000000

case when TO_CHAR(co.Data_chiusura)= '00-000-00' then to_date('31/12/9999','dd/mm/yyyy') else 
     to_date(to_char(co.Data_chiusura-1,'dd/mm/yyyy'),'dd/mm/yyyy')  end data_fine_contratto,

'D' "Tipo di contratto",
co.codice_contratto "Codice_contratto",
co.STATO_CONTRATTO "Stato Contrattuale",
decode (CO.CODICE_TIPO_USO  ,'R','D','N','D','N') "Tipo Cliente",
to_char(ut.POTENZA_massima,'009.9') "Potenza disponibile"  ,
'0' "RT",
pe.NOMINATIVO_RAG_SOC " Ragione Sociale",
co.codice_utente "Codice_Cliente",
concat(concat(concat(concat(trim(indirizzi.TOPONIMO_VIA),' '),
              concat(trim(indirizzi.PREFISSO_VIA),' ')),
       concat(concat(trim(indirizzi.DENOMINAZIONE_VIA),' '),
              concat(trim(indirizzi.CIVICO),' '))),
concat(concat(trim(indirizzi.ESTENSIONE_CIVICO),' '),


       concat(concat(trim(indirizzi.comune),' '),
       concat(trim(indirizzi.PROVINCIA),' ')))) "Indirizzo di Fornitura",
concat(concat(concat(concat(trim(indi.TOPONIMO_VIA),' '),
              concat(trim(indi.PREFISSO_VIA),' ')),
       concat(concat(trim(indi.DENOMINAZIONE_VIA),' '),
              concat(trim(indi.CIVICO),' '))),
concat(concat(trim(indi.ESTENSIONE_CIVICO),' '),


       concat(concat(trim(indi.comune),' '),
       concat(trim(indi.PROVINCIA),' ')))) "Indirizzo di Recapito",
       
 indirizzi.comune "Comune",
 ' ' "Ambito",
 ' ' "Codice venditore",
 decode (ca.CODICE_UTENTE_ALT,'PRODUTTORE','P','U') "Tipo Fornitura",
 ut.TENSIONE_PREVISTA,'DB1'


from db1.contratti@pgu3 co,db1.forniture@pgu3 fo,db1.utenze@pgu3 ut,
 asm_gisel_pod ex,
     db1.persone@pgu3 pe,db1.indirizzi@pgu3,db1.contratti_aggregazioni@pgu3 ca,db1.indirizzi@pgu3 indi
     
     


where co.STATO_CONTRATTO <> 'S' AND co.STATO_CONTRATTO <> 'E'  
 and co.codice_servizio = 'E'
and fo.codice_gestione = co.codice_gestione
and fo.codice_servizio = co.codice_servizio
and fo.codice_contratto = co.codice_contratto
and fo.codice_gestione = ut.codice_gestione
and fo.codice_servizio = ut.codice_servizio
and fo.codice_allacciamento = ut.codice_allacciamento
and fo.progressivo_utenza = ut.progressivo_utenza
--and ut.TENSIONE_PREVISTA = 'B'
and co.codice_gestione = ca.codice_gestione
and co.codice_utente = ca.codice_utente
and ca.CODICE_PERSONA_UTILIZZATORE = pe.CODICE_PERSONA
and ut.CODICE_INDIRIZZO_CONTATORE = indirizzi.CODICE_INDIRIZZO
and ca.CODICE_INDIRIZZO_SPEDIZIONE= indi.CODICE_INDIRIZZO
and ut.STATO_utenza in('D','A','C') 
--and co.DATA_AVVIO <= to_date ('01/01/2011','dd/mm/yyyy')
and co.CODICE_CAUSALE_CONTRATTO <> 'UE-A' 
and co.CODICE_CAUSALE_CONTRATTO <> 'UE-F'
and ex.pod=concat ('IT018E',concat(substr(concat ('000000000',fo.codice_allacciamento),-7,7),substr(concat('0000',fo.progressivo_utenza),-1,1)))
and co.DATA_STIPULAZIONE <> co.DATA_CHIUSURA 


